home *** CD-ROM | disk | FTP | other *** search
/ TeX 1995 July / TeX CD-ROM July 1995 (Disc 1)(Walnut Creek)(1995).ISO / macros / latex209 / contrib / elsevier / elsart.sty (.txt) < prev    next >
Texinfo Document  |  1994-11-15  |  30KB  |  879 lines
  1. % Document-style collection for journals published by Elsevier Science. 
  2. % To be used with LaTeX version 2.09 of 14 January 1992 (or later) 
  3. % Version: 2.12
  4. % Date:    2 June 1994
  5. % Copyright (C) 1994 by Elsevier Science. All rights reserved.
  6. % IMPORTANT NOTICE:
  7. % You are not allowed to change this file. You may however copy this file 
  8. % to a file with a different name and then change the copy. 
  9. % You are NOT ALLOWED to distribute this file alone. You are NOT ALLOWED 
  10. % to take money for the distribution or use of this file (or a changed 
  11. % version) except for a nominal charge for copying etc. 
  12. % You are allowed to distribute this file under the condition that it is 
  13. % distributed together with all files mentioned in readme.els. 
  14. % If you receive only some of these files from someone, complain! 
  15. \def\esp@fileversion{2.12}
  16. \def\esp@filedate{2 June 1994}
  17. \def\@shortjnl{\@nil}
  18. \def\@@shortjnl{\@nil}
  19. \def\@journal{Elsevier Science}
  20. \def\@issn{0}
  21. \def\@jid{ELSART} \def\@shortjid{elsart}
  22. \typeout{Elsevier Science preprint document style
  23. \esp@fileversion \space\space <\esp@filedate>}
  24. \def\partname{Part}
  25. \def\contentsname{Contents}
  26. \def\listfigurename{List of Figures}
  27. \def\listtablename{List of Tables}
  28. \def\refname{References}
  29. \def\indexname{Index}
  30. \def\figurename{Fig.}
  31. \def\tablename{Table}
  32. \def\abstractname{Abstract}
  33. \def\@ptsize{2}
  34. \def\ds@twoside{\@twosidetrue
  35.                 \@mparswitchtrue}
  36. \def\ds@oneside{\@twosidefalse
  37.                 \@mparswitchfalse}
  38. \@twocolumnfalse
  39. \newif\if@TwoColumn
  40. \def\ds@onecolumn{\@twocolumnfalse
  41.                   \@TwoColumnfalse}
  42. \def\ds@twocolumn{\@twocolumnfalse
  43.                   \@TwoColumntrue}
  44. \@TwoColumnfalse
  45. \@twosidefalse
  46. \@namedef{ds@10pt}{}
  47. \@namedef{ds@11pt}{}
  48. \def\ds@fleqn{}
  49. \def\@pagenumprefix{}
  50. \newif\if@draft \@draftfalse
  51. \def\query{}
  52. \def\ds@draft{%
  53. \@drafttrue
  54. \def\query{\marginpar{???}}%
  55. \overfullrule 5pt}
  56. \let\snm\relax \let\cty\relax \let\cny\relax
  57. \newif\if@seceqn
  58. \@seceqnfalse
  59. \def\ds@seceqn{\@seceqntrue}
  60. \newif\if@secthm
  61. \@secthmfalse
  62. \def\ds@secthm{\@secthmtrue}
  63. \newif\if@nameyear
  64. \@nameyearfalse
  65. \def\ds@nameyear{\@nameyeartrue}
  66. \newif\if@nfss
  67. \@ifundefined{selectfont}{\@nfssfalse}{\@nfsstrue}
  68. \@options
  69. \input \@shortjid1\@ptsize.sty\relax
  70. \def\left@label#1{{#1}\hss}
  71. \def\right@label#1{\hss\llap{#1}}
  72. \def\thick@label#1{\hspace\labelsep #1}
  73. \newcount\@maxlistdepth \@maxlistdepth=2
  74. \def\labelitemi{--}
  75. \def\labelitemii{$\cdot$}
  76. \def\labelenumi{(\theenumi)}        \def\theenumi{\roman{enumi}}
  77. \def\labelenumii{(\theenumii)}      \def\theenumii{\alph{enumii}}
  78. \def\enumerate{%
  79.   \ifnum \@enumdepth >\@maxlistdepth
  80.     \@toodeep
  81.   \else
  82.     \advance\@enumdepth \@ne
  83.     \edef\@enumctr{enum\romannumeral\the\@enumdepth}%
  84.     \list{\csname label\@enumctr\endcsname}%
  85.        {\usecounter{\@enumctr}
  86.        \let\makelabel=\right@label}
  87.   \fi}
  88. \def\itemize{%
  89.   \ifnum \@itemdepth >\@maxlistdepth
  90.     \@toodeep
  91.   \else
  92.     \advance\@itemdepth \@ne
  93.     \edef\@itemitem{labelitem\romannumeral\the\@itemdepth}%
  94.     \setleftmargin{i}{--}%
  95.     \setleftmargin{ii}{$\cdot$}%
  96.     \list{\csname\@itemitem\endcsname}%
  97.        {\let\makelabel\right@label}
  98.   \fi}
  99. \def\verse{\let\\=\@centercr
  100.   \list{}{\itemsep\z@
  101.   \itemindent \z@
  102.   \listparindent\z@
  103.   \rightmargin 1em
  104.   \leftmargin \rightmargin}\item[]}
  105. \let\endverse\endlist
  106. \def\quotation{\list{}{\itemindent\z@
  107.   \leftmargin 1em \rightmargin \z@
  108.   \parsep 0pt plus 1pt}\item[]}
  109. \let\endquotation=\endlist
  110. \def\quote{\list{}{\itemindent\z@
  111.   \leftmargin 1em \rightmargin\z@}\item[]}
  112. \let\endquote=\endlist
  113. \def\descriptionlabel#1{\hspace\labelsep \bf #1}
  114. \def\description{\list{}{\labelwidth\z@
  115.   \leftmargin 1em \itemindent-\leftmargin
  116.   \let\makelabel\descriptionlabel}}
  117. \let\enddescription\endlist
  118. \def\operatorname#1{\mathop{\mathrm{#1}}\nolimits}
  119. \def\lefteqn#1{\hbox to\z@{$\displaystyle {#1}$\hss}}
  120. \newskip\eqnbaselineskip
  121. \jot=2pt
  122. \newskip\eqnlineskip
  123. \eqnbaselineskip=14pt  \eqnlineskip=2pt
  124. \newdimen\mathindent
  125. \if@TwoColumn
  126.   \mathindent 0em
  127. \else
  128.   \mathindent 2em
  129. \def\[{\relax\ifmmode\@badmath
  130.   \else%
  131.   \@beginparpenalty\predisplaypenalty
  132.   \@endparpenalty\postdisplaypenalty
  133.   \begin{trivlist}\@topsep \eqntopsep
  134.    \@topsepadd \eqntopsep
  135.   \item[]\leavevmode
  136.   \hbox to\linewidth\bgroup$ \displaystyle
  137.   \hskip\mathindent\bgroup\fi}
  138. \def\]{\relax\ifmmode \egroup $\hfil \egroup
  139.   \end{trivlist}%
  140.   \else \@badmath \fi}
  141. \def\equation{\@beginparpenalty\predisplaypenalty
  142.   \@endparpenalty\postdisplaypenalty
  143. \refstepcounter{equation}\trivlist
  144.    \@topsep \eqntopsep
  145.    \@topsepadd \eqntopsep
  146.    \item[]\leavevmode
  147.   \hbox to\linewidth\bgroup $ \displaystyle \hskip\mathindent\bgroup}
  148. \def\endequation{\egroup$\hfil \displaywidth\linewidth
  149.   \@eqnnum\egroup \endtrivlist}
  150. \def\eqnarray{%
  151.   \par
  152.   \noindent
  153.   \baselineskip\eqnbaselineskip\lineskip\eqnlineskip
  154.   \lineskiplimit\eqnlineskip
  155.   \stepcounter{equation}%
  156.   \let\@currentlabel=\theequation
  157.   \global\@eqnswtrue
  158.   \global\@eqcnt\z@ \tabskip\mathindent \let\\=\@eqncr
  159.   \abovedisplayskip\eqntopsep\ifvmode\advance\abovedisplayskip\partopsep\fi
  160.   \belowdisplayskip\abovedisplayskip
  161.   \belowdisplayshortskip\abovedisplayskip
  162.   \abovedisplayshortskip\abovedisplayskip
  163.   $$\halign to \displaywidth\bgroup\@eqnsel
  164.     \pre@coli$\displaystyle\tabskip\z@{##}$\post@coli
  165.     &\global\@eqcnt\@ne
  166.     \pre@colii$\displaystyle{##}$\post@colii
  167.     &\global\@eqcnt\tw@
  168.     \pre@coliii $\displaystyle\tabskip\z@{##}$\post@coliii
  169.     \tabskip\@centering&\llap{##}\tabskip\z@\cr}
  170. \def\endeqnarray{\@@eqncr\egroup
  171.  \global\advance\c@equation\m@ne$$\global\@ignoretrue }
  172. \def\pre@coli{\hskip\@centering}              \def\post@coli{}
  173. \def\pre@colii{\hskip 2\eqnarraycolsep \hfil} \def\post@colii{\hfil}
  174. \def\pre@coliii{\hskip 2\eqnarraycolsep}      \def\post@coliii{\hfil}
  175. \arraycolsep 2pt
  176. \tabcolsep 6pt
  177. \def\arraystretch{1.5}
  178. \arrayrulewidth 0.4pt
  179. \doublerulesep 2pt
  180. \tabbingsep \labelsep
  181. \skip\@mpfootins = 6pt plus 2pt
  182. \fboxsep = 7pt
  183. \fboxrule = 0.4pt
  184. \newcounter{part}
  185. \newcounter{section}
  186. \newcounter{subsection}[section]
  187. \newcounter{subsubsection}[subsection]
  188. \newcounter{paragraph}[subsubsection]
  189. \newcounter{subparagraph}[paragraph]
  190. \def\thepart {\Roman{part}}
  191. \if@seceqn
  192.  \@addtoreset{equation}{section}
  193.  \@addtoreset{table}{section}
  194.  \@addtoreset{figure}{section}
  195.  \def\theequation{\arabic{section}.\arabic{equation}}
  196.  \def\thetable{\thesection.\arabic{table}}
  197.  \def\thefigure{\thesection.\arabic{figure}}
  198. \else
  199.  \def\theequation{\arabic{equation}}
  200.  \def\thefigure{\arabic{figure}}
  201.  \def\thetable{\arabic{table}}
  202. \def\thesection      {\arabic{section}}
  203. \def\thesubsection   {\thesection.\arabic{subsection}}
  204. \def\thesubsubsection{\thesubsection.\arabic{subsubsection}}
  205. \def\theparagraph    {\thesubsubsection.\arabic{paragraph}}
  206. \def\thesubparagraph {\theparagraph.\arabic{subparagraph}}
  207. \def\qed{\relax\ifmmode\hskip2em \Box\else\unskip\nobreak\hskip1em $\Box$\fi}
  208. \let\proof@headerfont\bf
  209. \ifx\normalshape\undefined
  210.   \gdef\normalshape{\rm}
  211. \newenvironment{pf}%
  212.   {\par\addvspace{\@bls plus 0.5\@bls minus 0.1\@bls}\noindent
  213.    {\bf\proofname}\enspace\ignorespaces}%
  214.   {\par\addvspace{\@bls plus 0.5\@bls minus 0.1\@bls}}
  215. \def\proofname{Proof.}
  216. \@namedef{pf*}#1{\par\begingroup\def\proofname{#1}\pf\endgroup\ignorespaces}
  217. \expandafter\let\csname endpf*\endcsname=\endpf
  218. \if@secthm
  219.   \newtheorem{thm}{Theorem}[section]\else
  220.   \newtheorem{thm}{Theorem}\fi
  221. \newtheorem{cor}[thm]{Corollary}
  222. \newtheorem{lem}[thm]{Lemma}
  223. \newtheorem{claim}[thm]{Claim}
  224. \newtheorem{axiom}[thm]{Axiom}
  225. \newtheorem{conj}[thm]{Conjecture}
  226. \newtheorem{fact}[thm]{Fact}
  227. \newtheorem{hypo}[thm]{Hypothesis}
  228. \newtheorem{assum}[thm]{Assumption}
  229. \newtheorem{prop}[thm]{Proposition}
  230. \newtheorem{crit}[thm]{Criterion}
  231. \newtheorem{defn}[thm]{Definition}
  232. \newtheorem{exmp}[thm]{Example}
  233. \newtheorem{rem}[thm]{Remark}
  234. \newtheorem{prob}[thm]{Problem}
  235. \newtheorem{prin}[thm]{Principle}
  236. \newtheorem{alg}{Algorithm}
  237. \long\def\@makealgocaption#1#2{\vskip 2ex \small
  238.   \hbox to \hsize{\parbox[t]{\hsize}{{\bf #1.} #2}}}
  239. \newcounter{algorithm}
  240. \def\thealgorithm{\@arabic\c@algorithm}
  241. \def\fps@algorithm{tbp}
  242. \def\ftype@algorithm{4}
  243. \def\ext@algorithm{lof}
  244. \def\fnum@algorithm{Algorithm \thealgorithm}
  245. \def\algorithm{\let\@makecaption\@makealgocaption\@float{algorithm}}
  246. \let\endalgorithm\end@float
  247. \newtheorem{note}{Note}
  248. \newtheorem{summ}{Summary}
  249. \newtheorem{case}{Case}
  250. \def\@pnumwidth{2.55em}
  251. \def\@tocrmarg{2.55em plus 5em}
  252. \def\@dotsep{-2.5}
  253. \setcounter{tocdepth}{2}
  254. \def\tableofcontents{%
  255.   \section*{\contentsname}%
  256.   \@starttoc{toc}}
  257. \def\l@section{\@dottedtocline{1}{0.0em}{1.40em}}
  258. \def\l@subsection{\@dottedtocline{2}{1.40em}{2.24em}}
  259. \def\l@subsubsection{\@dottedtocline{3}{2.24em}{3.09em}}
  260. \def\thebibliography{%
  261.   \@startsection{section}{1}{\z@}{20pt plus 8pt minus 4pt}
  262.   {\@bls}{\normalsize\bf}*{\refname}%
  263.   \addcontentsline{toc}{section}{\refname}%
  264.   \@thebibliography}
  265. \let\endthebibliography=\endlist
  266. \def\@thebibliography#1{\small
  267.   \list{\@biblabel{\arabic{enumiv}}}{\settowidth\labelwidth{\@biblabel{#1}}
  268.   \if@nameyear
  269.     \labelwidth\z@ \labelsep\z@ \leftmargin\parindent
  270.     \itemindent-\parindent
  271.   \else
  272.     \labelsep 3pt \itemindent\z@
  273.     \leftmargin\labelwidth \advance\leftmargin\labelsep
  274.     \itemsep 0.3\@bls plus 0.1\@bls minus 0.1\@bls
  275.     \usecounter{enumiv}\let\p@enumiv\@empty
  276.     \def\theenumiv{\arabic{enumiv}}}%
  277.     \def\newblock{\hskip 0.11em plus 0.33em minus -0.07em}
  278.     \tolerance\@M \hyphenpenalty\@M \hbadness5000 \sfcode`\.=1000\relax}
  279. \if@nameyear
  280.   \def\@biblabel#1{}
  281. \else
  282.   \def\@biblabel#1{\hskip \z@ plus 1filll[#1]}
  283. \newcount\@tempcntc
  284. \def\@citex[#1]#2{\if@filesw\immediate\write\@auxout{\string\citation{#2}}\fi
  285.  \@tempcnta\z@\@tempcntb\m@ne\def\@citea{}\@cite{\@for\@citeb:=#2\do
  286.   {\@ifundefined
  287.    {b@\@citeb}{\@citeo\@tempcntb\m@ne\@citea\def\@citea{,}{\bf ?}\@warning
  288.    {Citation `\@citeb' on page \thepage \space undefined}}%
  289.   {\setbox\z@\hbox{\global\@tempcntc0\csname b@\@citeb\endcsname\relax}%
  290.    \ifnum\@tempcntc=\z@ \@citeo\@tempcntb\m@ne
  291.     \@citea\def\@citea{,}\hbox{\csname b@\@citeb\endcsname}%
  292.    \else
  293.     \advance\@tempcntb\@ne
  294.     \ifnum\@tempcntb=\@tempcntc
  295.     \else\advance\@tempcntb\m@ne\@citeo
  296.     \@tempcnta\@tempcntc\@tempcntb\@tempcntc\fi\fi}}\@citeo}{#1}}
  297. \def\@citeo{\ifnum\@tempcnta>\@tempcntb\else\@citea\def\@citea{,}%
  298.  \ifnum\@tempcnta=\@tempcntb\the\@tempcnta\else
  299.   {\advance\@tempcnta\@ne\ifnum\@tempcnta=\@tempcntb \else \def\@citea{--}\fi
  300.    \advance\@tempcnta\m@ne\the\@tempcnta\@citea\the\@tempcntb}\fi\fi}
  301. \@namedef{cv*}{\section*{Curriculum Vitae}\cv}
  302. \def\cv{\hangindent=7pc \hangafter=-12 \parskip\bigskipamount \small}
  303. \def\footnote{\@ifnextchar[{\@xfootnote}{\refstepcounter
  304.    {\@mpfn}\xdef\@thefnmark{\thempfn}\@footnotemark\@footnotetext}}
  305. \def\footnotemark{\@ifnextchar[{\@xfootnotemark
  306.     }{\refstepcounter{footnote}\xdef\@thefnmark{\thefootnote}\@footnotemark}}
  307. \def\footnoterule{\kern-3\p@
  308.   \hrule width 3pc
  309.   \kern 2.6\p@}
  310. \def\thempfootnote{\alph{mpfootnote}}
  311. \def\mpfootnotemark{%
  312.   \@ifnextchar[{\@xmpfootnotemark}{\stepcounter{mpfootnote}%
  313.   \begingroup
  314.     \let\protect\noexpand
  315.     \xdef\@thefnmark{\thempfootnote}%
  316.   \endgroup
  317.   \@footnotemark}}
  318. \def\@xmpfootnotemark[#1]{%
  319.   \begingroup
  320.     \c@mpfootnote #1\relax
  321.     \let\protect\noexpand
  322.     \xdef\@thefnmark{\thempfootnote}%
  323.   \endgroup
  324.   \@footnotemark}
  325. \def\@mpmakefnmark{\,\hbox{$^{\mathrm{\@thefnmark}}$}}
  326. \long\def\@mpmakefntext#1{\noindent
  327.                      \hbox{$^{\mathrm{\@thefnmark}}$} #1}
  328. \def\@iminipage[#1]#2{\leavevmode
  329.   \@pboxswfalse
  330.   \if #1b\vbox
  331.   \else \if #1t\vtop
  332.   \else \ifmmode \vcenter
  333.   \else \@pboxswtrue $\vcenter
  334.   \fi \fi \fi
  335.   \bgroup \hsize #2\textwidth\hsize \columnwidth\hsize
  336.   \@parboxrestore
  337.   \def\@mpfn{mpfootnote}\def\thempfn{\thempfootnote}\c@mpfootnote\z@
  338.   \let\@footnotetext\@mpfootnotetext
  339.   \let\@makefntext\@mpmakefntext
  340.   \let\@makefnmark\@mpmakefnmark
  341.   \let\@listdepth\@mplistdepth \@mplistdepth\z@
  342.   \@minipagerestore\global\@minipagetrue
  343.   \everypar{\global\@minipagefalse\everypar{}}}
  344. \def\fn@presym{}
  345. \long\def\@makefntext#1{\noindent\hbox to 1em
  346.   {\hfil$^{\fn@presym\mathrm{\@thefnmark}}$}\,#1}
  347. \def\@makefnmark{\,\hbox{$^{\fn@presym\mathrm{\@thefnmark}}$}\,}
  348. \setcounter{topnumber}{5}
  349. \def\topfraction{0.99}
  350. \def\textfraction{0.05}
  351. \def\floatpagefraction{0.9}
  352. \setcounter{bottomnumber}{5}
  353. \def\bottomfraction{0.99}
  354. \setcounter{totalnumber}{10}
  355. \def\dbltopfraction{0.99}
  356. \def\dblfloatpagefraction{0.8}
  357. \setcounter{dbltopnumber}{5}
  358. \newbox\@tempboxb
  359. \long\def\@maketablecaption#1#2{\small
  360.   \hbox to \hsize{\parbox[t]{\hsize}{#1 \\ #2}}}
  361. \long\def\@makefigurecaption#1#2{\small
  362.   \vskip 8pt
  363.   \setbox\@tempboxa\hbox{#1. #2}
  364.   \ifdim \wd\@tempboxa >\hsize
  365.     \unhbox\@tempboxa\par
  366.   \else
  367.     \hbox to\hsize{\hfil\box\@tempboxa\hfil}%
  368.   \fi}
  369. \def\conttablecaption{\par \begingroup \@parboxrestore \normalsize
  370.   \@makecaption{\fnum@table\,---\,continued}{}\par
  371.   \vskip-1pc \endgroup}
  372. \def\contfigurecaption{\vskip-1pc \par \begingroup \@parboxrestore \normalsize
  373.   \@makecaption{\fnum@figure\,---\,continued}{}\par
  374.   \endgroup}
  375. \newcounter{figure}
  376. \def\thefigure{\@arabic\c@figure}
  377. \def\fps@figure{tbp}
  378. \def\ftype@figure{1}
  379. \def\ext@figure{lof}
  380. \def\fnum@figure{\figurename~\thefigure}
  381. \def\figure{\let\@makecaption\@makefigurecaption
  382.   \let\contcaption\contfigurecaption \@float{figure}}
  383. \let\endfigure\end@float
  384. \@namedef{figure*}{\let\@makecaption\@makefigurecaption
  385.   \let\contcaption\contfigurecaption \@dblfloat{figure}}
  386. \@namedef{endfigure*}{\end@dblfloat}
  387. \newcounter{table}
  388. \def\thetable{\@arabic\c@table}
  389. \def\fps@table{tbp}
  390. \def\ftype@table{2}
  391. \def\ext@table{lot}
  392. \def\fnum@table{\tablename~\thetable}
  393. \def\table{\let\@makecaption\@maketablecaption \small
  394.   \let\footnoterule\relax
  395.   \let\contcaption\conttablecaption \@float{table}}
  396. \let\endtable\end@float
  397. \@namedef{table*}{\let\@makecaption\@maketablecaption \small
  398.   \let\footnoterule\relax
  399.   \let\contcaption\conttablecaption \@dblfloat{table}}
  400. \@namedef{endtable*}{\end@dblfloat}
  401. \newtoks\t@glob@notes
  402. \newtoks\t@loc@notes
  403. \newcount\note@cnt
  404. \newcounter{author}
  405. \newcount\n@author
  406. \def\n@author@{}
  407. \newcounter{collab}
  408. \newcount\n@collab
  409. \def\n@collab@{}
  410. \newcounter{address}
  411. \newdimen\sv@mathsurround
  412. \newcount\sv@hyphenpenalty
  413. \newcount\prev@elem \prev@elem=0
  414. \newcount\cur@elem  \cur@elem=0
  415. \chardef\e@title=1
  416. \chardef\e@subtitle=1
  417. \chardef\e@author=2
  418. \chardef\e@collab=3
  419. \chardef\e@address=4
  420. \newif\if@newelem
  421. \newif\if@firstauthor
  422. \newif\if@preface
  423. \newif\if@hasabstract
  424. \newbox\fm@box
  425. \newdimen\fm@size
  426. \newbox\t@abstract
  427. \newbox\t@keyword
  428. \let\report@elt\@gobble
  429. \def\add@tok#1#2{\global#1\expandafter{\the#1#2}}
  430. \def\add@xtok#1#2{\begingroup
  431.   \no@harm
  432.   \xdef\@act{\global\noexpand#1{\the#1#2}}\@act
  433. \endgroup}
  434. \def\beg@elem{\global\t@loc@notes={}\global\note@cnt\z@}
  435. \def\@xnamedef#1{\expandafter\xdef\csname #1\endcsname}
  436. \def\no@harm{%
  437.   \let\\=\relax  \let\rm\relax
  438.   \let\ss=\relax \let\ae=\relax \let\oe=\relax
  439.   \let\AE=\relax \let\OE=\relax
  440.   \let\o=\relax  \let\O=\relax
  441.   \let\i=\relax  \let\j=\relax
  442.   \let\aa=\relax \let\AA=\relax
  443.   \let\l=\relax  \let\L=\relax
  444.   \let\d=\relax  \let\b=\relax \let\c=\relax
  445.   \let\bar=\relax
  446.   \def\protect{\noexpand\protect\noexpand}}
  447. \def\proc@elem#1#2{\begingroup
  448.     \no@harm
  449.     \let\thanksref\@gobble
  450.     \@xnamedef{@#1}{#2}%
  451.   \endgroup
  452.   \prev@elem=\cur@elem
  453.   \cur@elem=\csname e@#1\endcsname
  454.   \expandafter\elem@nothanksref#2\thanksref\relax}
  455. \def\elem@nothanksref#1\thanksref{\futurelet\@peektok\elem@thanksref}
  456. \def\elem@thanksref{\ifx\@peektok\relax
  457.   \else \expandafter\elem@morethanksref \fi}
  458. \def\elem@morethanksref#1{\add@thanksref{#1}\elem@nothanksref}
  459. \def\add@thanksref#1{\global\advance\note@cnt\@ne
  460.   \ifnum\note@cnt>\@ne \add@xtok\t@loc@notes{\note@sep}\fi
  461.   \add@tok\t@loc@notes{\ref{#1}}}
  462. \def\note@sep{,}
  463. \def\thanks{\@ifnextchar[{\@tempswatrue
  464.   \thanks@optarg}{\@tempswafalse\thanks@optarg[]}}
  465. \def\thanks@optarg[#1]#2{\refstepcounter{footnote}\if@tempswa
  466.   \label{#1}\else\relax\fi
  467.   \add@tok\t@glob@notes{\footnotetext}%
  468.   \add@xtok\t@glob@notes{[\the\c@footnote]}%
  469.   \add@tok\t@glob@notes{{#2}}}
  470. \def\frontmatter{%
  471.   \let\@corresp@note\relax
  472.   \global\t@glob@notes={}\global\c@author\z@
  473.   \global\c@collab\z@ \global\c@address\z@
  474.   \sv@mathsurround\mathsurround \m@th
  475.   \global\n@author=0\n@author@\relax
  476.   \global\n@collab=0\n@collab@\relax
  477.   \global\advance\n@author\m@ne
  478.   \global\advance\n@collab\m@ne
  479.   \global\@firstauthortrue
  480.   \global\@hasabstractfalse
  481.   \global\@prefacefalse
  482.   \@ifundefined{RIfM@}{}{\undo@AMS}%
  483.   \parskip 4\p@
  484.   \open@fm \ignorespaces}
  485. \def\preface{\@prefacetrue}
  486. \def\endfrontmatter{\global\n@author=\c@author
  487.   \global\n@collab=\c@collab \@writecount
  488.   \global\@topnum\z@
  489.   \ifx\@firstpage\@lastpage
  490.     \gdef\@pagerange{\@pagenumprefix\@firstpage}
  491.   \else
  492.     \gdef\@pagerange{\@pagenumprefix\@firstpage--\@pagenumprefix\@lastpage}
  493.   \fi
  494.   \thispagestyle{copyright}%
  495.   \if@preface \else
  496.   \history@fmt
  497.   \newcount\c@sv@footnote
  498.   \global\c@sv@footnote=\c@footnote
  499.   \if@hasabstract
  500.     \vskip 24pt plus 6pt minus 3pt
  501.     \hrule height 0.4pt
  502.     \vskip 8pt
  503.     \unvbox\t@abstract
  504.     \unvbox\t@keyword
  505.     \vskip 10pt
  506.     \hrule height 0.4pt
  507.   \fi
  508.   \dedicated@fmt
  509.   \vskip 18pt
  510.   \fi
  511.   \close@fm
  512.   \output@glob@notes
  513.   \global\c@footnote=\c@sv@footnote
  514.   \global\@prefacefalse
  515.   \global\leftskip\z@
  516.   \global\@rightskip\z@
  517.   \global\rightskip\@rightskip
  518.   \global\mathsurround\sv@mathsurround
  519.   \let\title\relax       \let\author\relax
  520.   \let\collab\relax      \let\address\relax
  521.   \let\frontmatter\relax \let\endfrontmatter\relax
  522.   \let\@maketitle\relax  \let\@@maketitle\relax
  523.   \normal@text}
  524. \let\maketitle\relax
  525. \newdimen\t@xtheight
  526. \t@xtheight\textheight \advance\t@xtheight-\splittopskip
  527. \def\open@fm{\global\setbox\fm@box=\vbox\bgroup
  528.   \hsize=\textwidth
  529.   \centering
  530.   \sv@hyphenpenalty\hyphenpenalty
  531.   \hyphenpenalty\@M}
  532. \def\close@fm{\egroup
  533.   \fm@size=\dp\fm@box \advance\fm@size by \ht\fm@box
  534.   \@whiledim\fm@size>\t@xtheight \do{%
  535.     \global\setbox\@tempboxa=\vsplit\fm@box to \t@xtheight
  536.     \unvbox\@tempboxa \newpage
  537.     \fm@size=\dp\fm@box \advance\fm@size by \ht\fm@box}
  538.   \if@TwoColumn
  539.     \emergencystretch=1pc \twocolumn[\unvbox\fm@box]
  540.   \else
  541.     \unvbox\fm@box
  542.   \fi}
  543. \def\output@glob@notes{\bgroup
  544.   \the\t@glob@notes
  545.   \egroup}
  546. \def\justify@off{\let\\=\@normalcr
  547.   \leftskip\z@ \@rightskip\@flushglue \rightskip\@rightskip}
  548. \def\justify@on{\let\\=\@normalcr
  549.   \leftskip\z@ \@rightskip\z@ \rightskip\@rightskip}
  550. \def\normal@text{\global\let\\=\@normalcr
  551.   \global\leftskip\z@ \global\@rightskip\z@ \global\rightskip\@rightskip
  552.   \global\parfillskip\@flushglue}
  553. \def\@writecount{\write\@mainaux{\string\global
  554.   \string\@namedef{n@author@}{\the\n@author}}%
  555.   \write\@mainaux{\string\global\string
  556.   \@namedef{n@collab@}{\the\n@collab}}}
  557. \def\title{\@ifnextchar[{\@@title}{\@@title[]}}
  558. \def\@@title[#1]#2{%
  559.   \beg@elem
  560.   \title@note@fmt
  561.   \add@tok\t@glob@notes
  562.     {\title@note@fmt}%
  563.   \proc@elem{title}{#2}%
  564.   \def\title@notes{\the\t@loc@notes}%
  565.   \title@fmt{\@title}{\title@notes}%
  566.   \ignorespaces}
  567. \def\subtitle#1{%
  568.   \beg@elem
  569.   \proc@elem{subtitle}{#1}%
  570.   \def\title@notes{\the\t@loc@notes}%
  571.   \subtitle@fmt{\@subtitle}{\title@notes}%
  572.   \ignorespaces}
  573. \newdimen \@logoheight \@logoheight 5pc
  574. \def\@Lhook{\vrule height \@logoheight width 0pt \vrule height 10pt width 0.2pt \vrule height 0.2pt width 10pt}
  575. \def\@Rhook{\vrule height 0.2pt width 10pt \vrule height 10pt width 0.2pt \vrule height \@logoheight width 0pt}
  576. \def\title@fmt#1#2{%
  577.   \vspace*{12pt}
  578.   {\Large #1\,\hbox{$^{#2}$}\par}%
  579.   \vskip 24pt
  580. \def\subtitle@fmt#1#2{%
  581.   {\Large #1\,\hbox{$^{#2}$}}\par}
  582. \def\title@note@fmt{\def\thefootnote{\fnstar{footnote}}}
  583. \def\author{\@ifnextchar[{\author@optarg}{\author@optarg[]}}
  584. \def\author@optarg[#1]#2{\stepcounter{author}%
  585.   \beg@elem
  586.   \@for\@tempa:=#1\do{\expandafter\add@thanksref\expandafter{\@tempa}}%
  587.   \report@elt{author}\proc@elem{author}{#2}%
  588.   \author@fmt{\the\c@author}{\the\t@loc@notes}{\@author}}%
  589. \def\author@fmt#1#2#3{\@newelemtrue
  590.   \if@firstauthor
  591.   \first@author \global\@firstauthorfalse \fi
  592.   \ifnum\prev@elem=\e@author \global\@newelemfalse \fi
  593.   \if@newelem \author@fmt@init \fi
  594.   \edef\@tempb{#2}\ifx\@tempb\@empty
  595.     \hbox{#3}\else
  596.     \hbox{#3\,$^{\mathrm{#2}}$}%
  597.   \fi}
  598. \def\first@author{\author@note@fmt
  599.   \add@tok\t@glob@notes
  600.     {\author@note@fmt\@corresp@note}}%
  601. \def\author@fmt@init{%
  602.   \par
  603.   \vskip 8pt plus 4pt minus 2pt
  604.   \large
  605.   \leavevmode}
  606. \def\and{\unskip~and~}
  607. \def\collab{\@ifstar{\collab@arg}{\collab@arg}}
  608. \let\collaboration=\collab
  609. \def\collab@arg#1{\stepcounter{collab}%
  610.   \if@firstauthor \first@collab \global\@firstauthorfalse \fi
  611.   \beg@elem
  612.   \proc@elem{collab}{#1}%
  613.   \collab@fmt{\the\c@collab}{\the\t@loc@notes}{\@collab}%
  614.   \ignorespaces}
  615. \def\collab@fmt#1#2#3{\@newelemtrue
  616.   \ifnum\prev@elem=\e@collab \global\@newelemfalse \fi
  617.   \if@newelem \collab@fmt@init \fi
  618.   \par
  619.   {\large #3\,$^{\mathrm{#2}}$}}
  620. \def\first@collab{
  621.   \collab@note@fmt
  622.   \add@tok\t@glob@notes
  623.     {\collab@note@fmt}}%
  624. \def\collab@fmt@init{\vskip 1em}
  625. \def\author@note@fmt{\setcounter{footnote}{0}%
  626.   \def\thefootnote{\xarabic{footnote}}}
  627. \let\collab@note@fmt=\author@note@fmt
  628. \def\xarabic#1{%
  629.   \expandafter\expandafter\expandafter\ifnum\expandafter\the\@nameuse{c@#1}<0
  630.   *\else\arabic{#1} \fi}
  631. \def\address{\@ifstar{\address@star}%
  632.   {\@ifnextchar[{\address@optarg}{\address@noptarg}}}
  633. \def\address@optarg[#1]#2{\refstepcounter{address}%
  634.   \beg@elem
  635.   \report@elt{address}\proc@elem{address}{#2}%
  636.   \address@fmt{\the\c@address}{\the\t@loc@notes}{\@address}\label{#1}%
  637.   \ignorespaces}
  638. \def\address@noptarg#1{\refstepcounter{address}%
  639.   \beg@elem
  640.   \proc@elem{address}{#1}%
  641.   \address@fmt{\z@}{\the\t@loc@notes}{\@address}%
  642.   \ignorespaces}
  643. \def\address@star#1{%
  644.   \beg@elem
  645.   \proc@elem{address}{#1}%
  646.   \address@fmt{\m@ne}{\the\t@loc@notes}{\@address}%
  647.   \ignorespaces}
  648. \def\theaddress{\alph{address}}
  649. \def\address@fmt#1#2#3{\@newelemtrue
  650.   \ifnum\prev@elem=\e@address \@newelemfalse \fi
  651.   \if@newelem \address@fmt@init \fi
  652.   \noindent \bgroup \small\it
  653.   \ifnum#1=\z@
  654.     #3\,$^{\mathrm{#2}}$\space%
  655.   \else
  656.     \ifnum#1=\m@ne
  657.       $^{\phantom{\mathrm{\theaddress}}}$\space #3\,$^{\mathrm{#2}}$%
  658.     \else
  659.       $^{\mathrm{\theaddress}}$\space #3\,$^{\mathrm{#2}}$%
  660.     \fi
  661.   \fi
  662.   \par \egroup}
  663. \def\address@fmt@init{%
  664.   \par
  665.   \vskip 6pt plus 3pt minus 1.5pt}
  666. \def\abstract{\@ifnextchar[{\@abstract}{\@abstract[]}}
  667. \def\@abstract[#1]{%
  668.   \global\@hasabstracttrue
  669.   \hyphenpenalty\sv@hyphenpenalty
  670.   \global\setbox\t@abstract=\vbox\bgroup
  671.   \leftskip\z@
  672.   \@rightskip\z@ \rightskip\@rightskip \parfillskip\@flushglue
  673.   \small
  674.   \parindent 1em
  675.   \noindent {\bf\abstractname}
  676.   \vskip 0.5\@bls
  677.   \ignorespaces}
  678. \def\endabstract{\par \egroup}
  679. \def\keyword{%
  680.   \global\@hasabstracttrue
  681.   \hyphenpenalty\sv@hyphenpenalty
  682.   \def\sep{\unskip; }
  683.   \def\MSC{\par\leavevmode\hbox {\it 1991 MSC:\ }}%
  684.   \def\PACS{\par\leavevmode\hbox {\it PACS:\ }}%
  685.   \def\JEL{\par\leavevmode\hbox {\it JEL classification:\ }}%
  686.   \let\UK\relax \let\CK\relax
  687.   \global\setbox\t@keyword=\vbox\bgroup
  688.   \small
  689.   \parskip\z@
  690.   \vskip 10pt plus 2pt minus 2pt
  691.   \noindent {\it Keywords:\ }%
  692.   \justify@off
  693.   \ignorespaces}
  694. \def\endkeyword{\par \egroup}
  695. \def\journal#1{\gdef\@journal{#1}}
  696. \def\volume#1{\gdef\@volume{#1}}       \def\@volume{0}
  697. \def\issue#1{\gdef\@issue{#1}}         \def\@issue{0}
  698. \newcount\@pubyear
  699. \newcount\@copyear
  700. \@pubyear=\number\year
  701. \@copyear\@pubyear \advance\@copyear-1900
  702. \def\pubyear#1{\global\@pubyear#1
  703.   \global\@copyear\@pubyear \global\advance\@copyear-1900
  704.   \ignorespaces}
  705. \def\firstpage#1{\def\@tempa{#1}\ifx\@tempa\@empty\else
  706.   \gdef\@firstpage{#1}\gdef\@lastpage{#1}%
  707.   \global\c@page=#1 \ignorespaces\fi
  708. \def\@firstpage{1}
  709. \def\lastpage#1{\def\@tempa{#1}\ifx\@tempa\@empty\else
  710.   \gdef\@lastpage{#1}\ignorespaces\fi}
  711. \def\@lastpage{0}
  712. \def\@pagerange{1--0}
  713. \def\date#1{\gdef\@date{#1}}                  \def\@date{\today}
  714. \def\aid#1{}
  715. \def\ssdi#1#2{}
  716. \def\received#1{\def\@tempa{#1}\ifx\@tempa\@empty\else\gdef\@received{#1}\fi}
  717.   \def\@received{\@nil}
  718. \def\revised#1{\def\@tempa{#1}\ifx\@tempa\@empty\else\gdef\@revised{#1}\fi}
  719.   \def\@revised{\@nil}
  720. \def\accepted#1{\def\@tempa{#1}\ifx\@tempa\@empty\else\gdef\@accepted{#1}\fi}
  721.   \def\@accepted{\@nil}
  722. \def\communicated#1{\def\@tempa{#1}\ifx\@tempa\@empty\else\gdef\@communicated{#1}\fi}
  723.   \def\@communicated{\@nil}
  724. \def\dedicated#1{\def\@tempa{#1}\ifx\@tempa\@empty\else\gdef\@dedicated{#1}\fi}
  725.   \def\@dedicated{\@nil}
  726. \def\presented#1{\def\@tempa{#1}\ifx\@tempa\@empty\else\gdef\@presented{#1}\fi}
  727.   \def\@presented{\@nil}
  728. \def\articletype#1{\gdef\@articletype{#1}}
  729.   \@ifundefined{@articletype}{\def\@articletype{}}{}
  730. \def\received@prefix{Received~}
  731. \def\revised@prefix{; revised~}
  732. \def\accepted@prefix{; accepted~}
  733. \def\communicated@prefix{\\Communicated~by~}
  734. \def\history@prefix{}
  735. \def\received@postfix{}
  736. \def\revised@postfix{}
  737. \def\accepted@postfix{}
  738. \def\communicated@postfix{}
  739. \def\history@postfix{}
  740. \def\empty@data{\@nil}
  741. \def\history@fmt{%
  742.   \bgroup
  743.   \small
  744.   \vskip 6pt plus 2pt minus 1pt
  745.   \ifx\@received\empty@data \else
  746.     \leavevmode
  747.     \history@prefix
  748.     \received@prefix\@received \received@postfix%
  749.     \ifx\@revised\empty@data \else
  750.       \revised@prefix\@revised \revised@postfix%
  751.     \fi
  752.     \ifx\@accepted\empty@data \else
  753.       \accepted@prefix\@accepted \accepted@postfix%
  754.     \fi
  755.     \ifx\@communicated\empty@data \else
  756.       \communicated@prefix\@communicated \communicated@postfix%
  757.     \fi
  758.     \history@postfix
  759.   \fi
  760.   \par \egroup}
  761. \def\dedicated@fmt{%
  762.   \ifx\@dedicated\empty@data \else
  763.     \vskip 4pt plus 3pt
  764.     \normalsize\it\centering \@dedicated
  765.     \fi}
  766. \def\@ialph#1{\ifcase#1\or \or \or \or \or e\or f\or g\or h\or i\or j\or
  767.   k\or \ell\or m\or n\or o\or p\or q\or r\or s\or t\or u\or v\or w\or x\or
  768.   y\or z\or aa\or ab\or ac\or ad\or ae\or af\or ag\or ah\or ai\or aj\or
  769.   ak\or a\ell\or am\or an\or ao\or ap\or aq\or ar\or as\or at\or au\or av\or
  770.   aw\or ay\or az\or ba\or bb\or bc\or bd\or be\or bf\or bg\or bh\or bi\or
  771.   bj\or bk\or b\ell\or bm\or bn\or bo\or bp\or bq\or br\or bs\or bt\or
  772.   bu\or bw\or bx\or by\or bz\or ca\or cb\or cc\or cd\or ce\or cf\or cg\or
  773.   ch\or ci\or cj\or ck\or c\ell\or cm\or cn\or co\or cp\or cq\or cr\or
  774.   cs\or ct\or cu\or cw\or cx\or cy\or cz\else\@ctrerr\fi}
  775. \def\fnstar#1{\@fnstar{\@nameuse{c@#1}}}
  776. \def\@fnstar#1{\ifcase#1\or
  777.     \hbox{$\star$}\or
  778.     \hbox{$\star\star$}\or
  779.     \hbox{$\star\star\star$}\or
  780.     \hbox{$\star\star\star\star$}\or
  781.     \hbox{$\star\star\star\star\star$}\or
  782.     \hbox{$\star\star\star\star\star\star$}
  783.   \else
  784.     \@ctrerr
  785.   \fi
  786.   \relax}
  787. \mark{{}{}}
  788. \def\ps@plain{\let\@mkboth\@gobbletwo
  789.  \def\@oddhead{}%
  790.  \def\@evenhead{}%
  791.  \def\@oddfoot{\hfil {\rm\thepage} \hfil}%
  792.  \let\@evenfoot\@oddfoot}
  793. \def\@copyright{\@issn/\the\@copyear/\$\@price\ $\copyright$\ \the\@pubyear\
  794.   Elsevier Science B.V. All rights reserved}
  795. \def\@jou@vol@pag{\@journal\ \@volume\ (\the\@pubyear)\ \@pagerange}
  796. \let\@j@v@p\@jou@vol@pag
  797. \let\@@j@v@p\@jou@vol@pag
  798. \def\sectionmark#1{}
  799. \def\subsectionmark#1{}
  800. \def\ps@copyright{\let\@mkboth\@gobbletwo
  801.   \def\@oddhead{}%
  802.   \let\@evenhead\@oddhead
  803.   \def\@oddfoot{\small\sl
  804.     \def\@tempa{0}
  805.     \ifx\@volume\@tempa
  806.       Preprint submitted to \@journal\hfil\@date\/%
  807.     \else
  808.       Article published in \@jou@vol@pag\hfil\hbox{}\fi}%
  809.   \let\@evenfoot\@oddfoot
  810. \let\ps@noissn\ps@empty
  811. \let\ps@headings\ps@plain
  812. \def\today{\number\day\space\ifcase\month\or
  813.   January\or February\or March\or April\or May\or June\or
  814.   July\or August\or September\or October\or November\or December\fi
  815.   \space\number\year}
  816. \if@nfss \relax \else
  817.   \def\mathrm#1{{\rm #1}}
  818.   \let\@@mit=\mit
  819.   \def\mit#1{{\@@mit #1}}
  820. \def\nuc#1#2{\relax\ifmmode{}^{#1}{\protect\text{#2}}\else${}^{#1}$#2\fi}
  821. \def\itnuc#1#2{\setbox\@tempboxa=\hbox{\scriptsize\it #1}
  822.   \def\@tempa{{}^{\box\@tempboxa}\!\protect\text{\it #2}}\relax
  823.   \ifmmode \@tempa \else $\@tempa$\fi}
  824. \let\old@vec\vec
  825. \def\pol#1{\old@vec{#1}}
  826. \def\@bfvec#1{\boldsymbol{#1}}
  827. \def\@pmbfvec#1{\pmb{#1}}
  828. \def\undo@AMS{\global\let\vec\@bfvec}
  829. \def\half{{\textstyle {1\over2}}}
  830. \def\threehalf{{\textstyle {3\over2}}}
  831. \def\quart{{\textstyle {1\over4}}}
  832. \def\d{\,\mathrm{d}}
  833. \def\e{\mathop{\mathrm{e}}\nolimits}
  834. \def\int{\intop}
  835. \def\oint{\ointop}
  836. \newbox\slashbox \setbox\slashbox=\hbox{$/$}
  837. \newbox\Slashbox \setbox\Slashbox=\hbox{\large$/$}
  838. \def\pFMslash#1{\setbox\@tempboxa=\hbox{$#1$}
  839.   \@tempdima=0.5\wd\slashbox \advance\@tempdima 0.5\wd\@tempboxa
  840.   \copy\slashbox \kern-\@tempdima \box\@tempboxa}
  841. \def\pFMSlash#1{\setbox\@tempboxa=\hbox{$#1$}
  842.   \@tempdima=0.5\wd\Slashbox \advance\@tempdima 0.5\wd\@tempboxa
  843.   \copy\Slashbox \kern-\@tempdima \box\@tempboxa}
  844. \def\FMslash{\protect\pFMslash}
  845. \def\FMSlash{\protect\pFMSlash}
  846. \mathchardef\Gamma="0000
  847. \mathchardef\Delta="0001
  848. \mathchardef\Theta="0002
  849. \mathchardef\Lambda="0003
  850. \mathchardef\Xi="0004
  851. \mathchardef\Pi="0005
  852. \mathchardef\Sigma="0006
  853. \mathchardef\Upsilon="0007
  854. \mathchardef\Phi="0008
  855. \mathchardef\Psi="0009
  856. \mathchardef\Omega="000A
  857. \mathchardef\varGamma="0100
  858. \mathchardef\varDelta="0101
  859. \mathchardef\varTheta="0102
  860. \mathchardef\varLambda="0103
  861. \mathchardef\varXi="0104
  862. \mathchardef\varPi="0105
  863. \mathchardef\varSigma="0106
  864. \mathchardef\varUpsilon="0107
  865. \mathchardef\varPhi="0108
  866. \mathchardef\varPsi="0109
  867. \mathchardef\varOmega="010A
  868. \if@nfss
  869.   \def\Cset{\Bbb{C}}
  870.   \def\Hset{\Bbb{H}}
  871.   \def\Nset{\Bbb{N}}
  872.   \def\Qset{\Bbb{Q}}
  873.   \def\Rset{\Bbb{R}}
  874.   \def\Zset{\Bbb{Z}}
  875. \ps@headings
  876. \pagenumbering{arabic}
  877. \def\thepage{\@pagenumprefix\arabic{page}}
  878. \endinput
  879.